home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / workbench / tools / czesc_4 / sregexp / kludge.asm < prev    next >
Assembly Source File  |  1991-08-05  |  2KB  |  94 lines
  1.  
  2. ;-------------------------------------------------------------------
  3. ; Here are the links to the c code.  Anything that dice can't make
  4. ; registered arguement versions of would have to stick the stuff onto the
  5. ; stack.  Note that the fd file and dice must both have the same
  6. ; idea of what gets passed in what.  I will perhaps automate that
  7. ; one day.  For now just be carefull.
  8. ;-------------------------------------------------------------------
  9.  
  10.         section     kludge,code
  11.  
  12.         xdef        parsesregexp
  13.         xref        @parsesregexp
  14. parsesregexp:
  15.         move.l        a4,-(sp)
  16.         move.l        a6,a4
  17.         jsr        @parsesregexp(pc)
  18.         move.l        (sp)+,a4
  19.         rts
  20.  
  21.         xdef        freesregexp
  22.         xref        @freesregexp
  23. freesregexp:
  24.         move.l        a4,-(sp)
  25.         move.l        a6,a4
  26.         jsr        @freesregexp(pc)
  27.         move.l        (sp)+,a4
  28.         rts
  29.  
  30.         xdef        matchsregexp
  31.         xref        @matchsregexp
  32. matchsregexp:
  33.         move.l        a4,-(sp)
  34.         move.l        a6,a4
  35.         jsr        @matchsregexp(pc)
  36.         move.l        (sp)+,a4
  37.         rts
  38.  
  39.         xdef        matchnsregexp
  40.         xref        @matchnsregexp
  41. matchnsregexp:
  42.         move.l        a4,-(sp)
  43.         move.l        a6,a4
  44.         jsr        @matchnsregexp(pc)
  45.         move.l        (sp)+,a4
  46.         rts
  47.  
  48.         xdef        iswild
  49.         xref        @iswild
  50. iswild:
  51.         move.l        a4,-(sp)
  52.         move.l        a6,a4
  53.         jsr        @iswild(pc)
  54.         move.l        (sp)+,a4
  55.         rts
  56.  
  57.         xdef        anchorpath
  58.         xref        @anchorpath
  59. anchorpath:
  60.         move.l        a4,-(sp)
  61.         move.l        a6,a4
  62.         jsr        @anchorpath(pc)
  63.         move.l        (sp)+,a4
  64.         rts
  65.  
  66.         xdef        nextfile
  67.         xref        @nextfile
  68. nextfile:
  69.         move.l        a4,-(sp)
  70.         move.l        a6,a4
  71.         jsr        @nextfile(pc)
  72.         move.l        (sp)+,a4
  73.         rts
  74.  
  75.         xdef        buildpath
  76.         xref        @buildpath
  77. buildpath:
  78.         move.l        a4,-(sp)
  79.         move.l        a6,a4
  80.         jsr        @buildpath(pc)
  81.         move.l        (sp)+,a4
  82.         rts
  83.  
  84.         xdef        freespathinfo
  85.         xref        @freespathinfo
  86. freespathinfo:
  87.         move.l        a4,-(sp)
  88.         move.l        a6,a4
  89.         jsr        @freespathinfo(pc)
  90.         move.l        (sp)+,a4
  91.         rts
  92.  
  93.         end
  94.